### Wine
id=39
name=Wine
group=potion
icon=gfx\wine.bmp
model=gfx\wine.b3d
scale=0.28
mat=glass
weight=450
info=tasty wine. You shouldn't drink too much...
script=start
	on:eat {
	        play "beer.wav",15;
		process "drinking",2000;
		drink 10,5,40,0;
		$s2g_alc+=40;
		if ($s2g_alc>=100){
			addstate "unit",1,"fuddle";
			if ($s2g_alc>=200){
				$s2g_alc=50;
				process "vomiting",1000;
				consume -10,-5,-5,0;
				freestate "unit",1,"fuddle";
				play "vomit.wav";
				vomit 1;
			}
		}
	}
script=end